home *** CD-ROM | disk | FTP | other *** search
/ Virtual Vibrations / Virtual Vibrations.iso / mac / Virtual Vibrations / STAR.DXR / 00007.ls < prev    next >
Encoding:
Text File  |  1994-10-28  |  3.0 KB  |  134 lines
  1. on CHANGESOUND1
  2.   puppetSprite(48, 1)
  3.   if the soundEnabled then
  4.     set the castNum of sprite 48 to cast "SoundOff1"
  5.     set the soundEnabled to 0
  6.     updateStage()
  7.   else
  8.     if not (the soundEnabled) then
  9.       set the castNum of sprite 48 to cast "SoundOn1"
  10.       set the soundEnabled to 1
  11.       updateStage()
  12.     end if
  13.   end if
  14. end
  15.  
  16. on CHANGESOUND2
  17.   puppetSprite(48, 1)
  18.   if the soundEnabled then
  19.     set the castNum of sprite 48 to cast "Soundoff2"
  20.     set the soundEnabled to 0
  21.     updateStage()
  22.   else
  23.     if not (the soundEnabled) then
  24.       set the castNum of sprite 48 to cast "SoundOn2"
  25.       set the soundEnabled to 1
  26.       updateStage()
  27.     end if
  28.   end if
  29. end
  30.  
  31. on CHANGESOUND3
  32.   puppetSprite(48, 1)
  33.   if the soundEnabled then
  34.     set the castNum of sprite 48 to cast "Soundoff3"
  35.     set the soundEnabled to 0
  36.     updateStage()
  37.   else
  38.     if not (the soundEnabled) then
  39.       set the castNum of sprite 48 to cast "Soundon3"
  40.       set the soundEnabled to 1
  41.       updateStage()
  42.     end if
  43.   end if
  44. end
  45.  
  46. on CHANGESOUND3B
  47.   puppetSprite(48, 1)
  48.   puppetPalette("movie menu palette")
  49.   if the soundEnabled then
  50.     set the castNum of sprite 48 to cast "Sound2.BMP"
  51.     set the soundEnabled to 0
  52.   else
  53.     if not (the soundEnabled) then
  54.       set the castNum of sprite 48 to cast "Sound1.BMP"
  55.       set the soundEnabled to 1
  56.     end if
  57.   end if
  58. end
  59.  
  60. on CHANGESOUND4
  61.   puppetSprite(48, 1)
  62.   if the soundEnabled then
  63.     set the castNum of sprite 48 to cast "Soundoff4"
  64.     set the soundEnabled to 0
  65.     updateStage()
  66.   else
  67.     if not (the soundEnabled) then
  68.       set the castNum of sprite 48 to cast "Soundon4"
  69.       set the soundEnabled to 1
  70.       updateStage()
  71.     end if
  72.   end if
  73. end
  74.  
  75. on CHANGESOUND4b
  76.   puppetSprite(48, 1)
  77.   if the soundEnabled then
  78.     set the castNum of sprite 48 to cast "Soundon4prev"
  79.     set the soundEnabled to 0
  80.     updateStage()
  81.   else
  82.     if not (the soundEnabled) then
  83.       set the castNum of sprite 48 to cast "Soundoff4prev"
  84.       set the soundEnabled to 1
  85.       updateStage()
  86.     end if
  87.   end if
  88. end
  89.  
  90. on CHANGESOUND5
  91.   puppetSprite(48, 1)
  92.   if the soundEnabled then
  93.     set the castNum of sprite 48 to cast "SoundOff5"
  94.     set the soundEnabled to 0
  95.     updateStage()
  96.   else
  97.     if not (the soundEnabled) then
  98.       set the castNum of sprite 48 to cast "SoundOn5"
  99.       set the soundEnabled to 1
  100.       updateStage()
  101.     end if
  102.   end if
  103. end
  104.  
  105. on CHANGESOUND6b
  106.   if the soundEnabled then
  107.     set the castNum of sprite 48 to cast "SoundOff6"
  108.     set the soundEnabled to 0
  109.     updateStage()
  110.   else
  111.     if not (the soundEnabled) then
  112.       set the castNum of sprite 48 to cast "SoundOn6"
  113.       set the soundEnabled to 1
  114.       updateStage()
  115.     end if
  116.   end if
  117. end
  118.  
  119. on CHANGESOUND6
  120.   global soundsprite
  121.   puppetPalette(0)
  122.   if the soundEnabled then
  123.     set the castNum of sprite the clickOn to cast "SoundOff6"
  124.     set the soundEnabled to 0
  125.     updateStage()
  126.   else
  127.     if not (the soundEnabled) then
  128.       set the castNum of sprite 48 to cast "SoundOn6"
  129.       set the soundEnabled to 1
  130.       updateStage()
  131.     end if
  132.   end if
  133. end
  134.